#!/usr/bin/perl -w

use strict;
use Pod::Usage;
use Getopt::Long;
use Bench::Test;
use Carp;

sub version {
  print "Version $Bench::Test::VERSION\n";
  exit;
}

sub usage {
  print "Usage:\n  $0 [-f configfile]\n";
  exit;
}

sub man {
  pod2usage(
    -exitval => 1,
    -verbose => 2
  );
}

# MAIN ========================================================================

my $config_file = './maketest.conf';   # By default is 'maketest.conf'

GetOptions(
  'version' => \&version,
  'usage'   => \&usage,
  'help'    => \&man,
  'file=s'  => \$config_file
) or croak usage();

my $bench = new Bench::Test(
                   config_file => $config_file,
                );

$bench->make_tests;

__END__
